home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_1 / issue_02 / h1 (.txt) < prev    next >
Encoding:
RISC OS BBC BASIC V Source  |  1987-10-20  |  255 b   |  19 lines
  1.  W.R.HINDLE Oct 1987
  2. 24,512;416;768;608;:
  3. :Z%=20:
  4.  X%=0 
  5.  1279 
  6.  1279-X%,0,X%,1023:
  7.  Y%=0 
  8.  1023 
  9.  0,Y%,1279,1023-Y%:
  10.  508,412:
  11.  772,612:
  12. "SGET FRED":
  13. "SCHOOSE FRED":
  14.  Z%=1 
  15.  100:
  16.  &ED,
  17. (100)*10,
  18. (80)*10:
  19.